home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / dbase / techs.zip / TECH18.ZIP / PAGETOP.PRG < prev    next >
Text File  |  1985-11-02  |  356b  |  18 lines
  1. * PROCEDURE Pagetop.PRG
  2. * Date....: November 1, 1985
  3. * Version.: dBASE III, The Developer's Release
  4. * Note(s).: Prints a page heading for memo report.
  5. *           Called by Memorpt.PRG.
  6. *
  7. EJECT
  8. ?
  9. ? "Page " + STR( page,3 )
  10. ? DATE()
  11. ?
  12. ? SPACE(25),"Heading One"
  13. ? SPACE(25),"Heading Two"
  14. ?
  15. linecnt = 7
  16. page    = page + 1
  17. RETURN
  18. * EOP Pagetop